home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / util / text / edt10.lha / S / M2Edt / HSplitWin.edt next >
Text File  |  1994-08-19  |  256b  |  17 lines
  1. /* Fenster horizontal teilen */
  2. OPTIONS RESULTS
  3.  
  4. 'Get WINDOWID'
  5. me=RESULT
  6. 'Get' WINDOWWIDTH
  7. w=RESULT%2
  8. 'Set' WINDOWWIDTH w
  9. 'Get' WINDOWLEFT
  10. l=RESULT+w
  11. 'Get' WINDOWTOP
  12. t=RESULT
  13. 'Get' WINDOWHEIGHT
  14. h=RESULT
  15. 'NewWindow'
  16. 'SetWindowBox' l t w h
  17. 'SelectWindow' me